home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 6 / developer source - volume 6.iso / parad / mar95 / mcin105.gif < prev    next >
Graphics Interchange Format  |  1996-11-19  |  7.6 KB  |  497x384  |  4-bit (5 colors)
   ocr: = HCURESSSLHschpt-ron method run(var eventinfo Event) var tc TCursor numrecs Number tempArray Array[2] Anyiype enduar temparrayl1] = 1900 cemparraylz] = - 8000 C.open(CURDERS.DE", "Total Invoice") CC.Setkange(temparray) numrecs = tc.nRecords0) nsginfo(" "There are : :E String(numrecs) + : invoices between An" + Stringenparrayt1):" : + String(tempArrayl2])) endmethod Edit Line: 17 Col: 5: